(line-move-to-column): Don't call move-to-column if COL=0.

diff --git a/lisp/simple.el b/lisp/simple.el
index b9235eaf17f857f21897c864ad03e9f4aa670adf..8e4a52f4d329b6644b4a5aa695b113e7201c2393 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2633,7 +2633,9 @@ Outline mode sets this."
 This function works only in certain cases,
 because what we really need is for `move-to-column'
 and `current-column' to be able to ignore invisible text."
-  (move-to-column col)
+  (if (zerop col)
+      (beginning-of-line)
+    (move-to-column col))
 
   (when (and line-move-ignore-invisible
             (not (bolp)) (line-move-invisible (1- (point))))